inherited frmFixAssetDecrease: TfrmFixAssetDecrease
  Left = 590
  Top = 216
  Caption = #22266#23450#36164#20135#20943#23569
  ClientHeight = 401
  FormStyle = fsMDIChild
  Visible = True
  ExplicitHeight = 440
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlBottom: TPanel
    Top = 336
    Height = 65
    ExplicitTop = 336
    ExplicitHeight = 65
    inherited Bevel1: TBevel
      ExplicitWidth = 566
    end
    inherited btnOK: TBitBtn
      Left = 602
      Top = 25
      ExplicitLeft = 602
      ExplicitTop = 25
    end
    inherited btnCancel: TBitBtn
      Left = 692
      Top = 25
      ExplicitLeft = 692
      ExplicitTop = 25
    end
    inherited btnContinue: TBitBtn
      Top = 25
      ExplicitTop = 25
    end
    inherited btnPri: TBitBtn
      Top = 25
      ExplicitTop = 25
    end
    inherited btnNext: TBitBtn
      Top = 25
      ExplicitTop = 25
    end
    inherited btnBaseEditSave: TBitBtn
      Top = 25
      ExplicitTop = 25
    end
  end
  object pnl1: TPanel [1]
    Left = 0
    Top = 47
    Width = 792
    Height = 289
    Align = alClient
    BevelOuter = bvNone
    Color = 16773345
    TabOrder = 3
    object cxLabel1: TcxLabel
      Left = 32
      Top = 24
      Caption = #36164#20135#32534#21495#65306
      Transparent = True
    end
    object cxLabel2: TcxLabel
      Left = 32
      Top = 61
      Caption = #20943#23569#26085#26399#65306
      Transparent = True
    end
    object cxLabel3: TcxLabel
      Left = 32
      Top = 101
      Caption = #20943#23569#26041#24335#65306
      Transparent = True
    end
    object cxLabel4: TcxLabel
      Left = 32
      Top = 141
      Caption = #28165#29702#31185#30446#65306
      Transparent = True
    end
    object cxLabel5: TcxLabel
      Left = 32
      Top = 181
      Caption = #28165#29702#21407#22240#65306
      Transparent = True
    end
    object cxLabel6: TcxLabel
      Left = 8
      Top = 221
      Caption = #28165#29702#25910#20837#31185#30446#65306
      Transparent = True
    end
    object cxLabel7: TcxLabel
      Left = 280
      Top = 24
      Caption = #36164#20135#21517#31216#65306
      Transparent = True
    end
    object cxLabel8: TcxLabel
      Left = 280
      Top = 61
      Caption = #28165#29702#25910#20837#65306
      Transparent = True
    end
    object cxLabel9: TcxLabel
      Left = 280
      Top = 101
      Caption = #28165#29702#36153#29992#65306
      Transparent = True
    end
    object cxLabel10: TcxLabel
      Left = 256
      Top = 261
      Caption = #28165#29702#36153#29992#36134#30446#65306
      Enabled = False
      Transparent = True
    end
    object cxLabel11: TcxLabel
      Left = 8
      Top = 261
      Caption = #28165#29702#25910#20837#36134#30446#65306
      Enabled = False
      Transparent = True
    end
    object cxLabel12: TcxLabel
      Left = 256
      Top = 221
      Caption = #28165#29702#36153#29992#31185#30446#65306
      Transparent = True
    end
    object cxdbdtdtClearDate: TcxDBDateEdit
      Left = 96
      Top = 59
      DataBinding.DataField = 'cleardate'
      DataBinding.DataSource = MainDataSource
      TabOrder = 12
      Width = 145
    end
    object cbbAstCode: TcxDBLookupComboBox
      Left = 96
      Top = 20
      DataBinding.DataField = 'fixedassetid'
      DataBinding.DataSource = MainDataSource
      Properties.GridMode = True
      Properties.ImmediatePost = True
      Properties.KeyFieldNames = 'fixedassetid'
      Properties.ListColumns = <
        item
          Caption = #32534#21495
          FieldName = 'assetcode'
        end
        item
          Caption = #21517#31216
          FieldName = 'name'
        end>
      Properties.ListOptions.SyncMode = True
      Properties.ListSource = dsAsset
      Properties.OnChange = cbbAstCodePropertiesChange
      Properties.OnCloseUp = cbbAstCodePropertiesCloseUp
      Properties.OnInitPopup = cbbAstCodePropertiesInitPopup
      TabOrder = 13
      Width = 145
    end
    object cbbDelType: TcxDBLookupComboBox
      Tag = 105
      Left = 96
      Top = 99
      DataBinding.DataField = 'fadeltypeid'
      DataBinding.DataSource = MainDataSource
      Properties.ListColumns = <>
      TabOrder = 14
      Width = 145
    end
    object cbbDelSubID: TcxDBLookupComboBox
      Tag = 63
      Left = 96
      Top = 139
      DataBinding.DataField = 'clearsubid'
      DataBinding.DataSource = MainDataSource
      Properties.ListColumns = <>
      TabOrder = 15
      Width = 145
    end
    object cbbClearIncomSubID: TcxDBLookupComboBox
      Tag = 63
      Left = 96
      Top = 219
      DataBinding.DataField = 'incomesubid'
      DataBinding.DataSource = MainDataSource
      Properties.ListColumns = <>
      Properties.OnChange = cbbClearIncomSubIDPropertiesChange
      TabOrder = 16
      Width = 145
    end
    object cbbClearIncomAccID: TcxDBLookupComboBox
      Tag = 16
      Left = 96
      Top = 259
      DataBinding.DataField = 'incomeaccountid'
      DataBinding.DataSource = MainDataSource
      Enabled = False
      Properties.ListColumns = <>
      TabOrder = 17
      Width = 145
    end
    object cbbClearPaySubID: TcxDBLookupComboBox
      Tag = 63
      Left = 344
      Top = 219
      DataBinding.DataField = 'paysubid'
      DataBinding.DataSource = MainDataSource
      Properties.ListColumns = <>
      Properties.OnChange = cbbClearPaySubIDPropertiesChange
      TabOrder = 18
      Width = 145
    end
    object cbbClearPayAccID: TcxDBLookupComboBox
      Tag = 16
      Left = 344
      Top = 259
      DataBinding.DataField = 'payaccountid'
      DataBinding.DataSource = MainDataSource
      Enabled = False
      Properties.ListColumns = <>
      TabOrder = 19
      Width = 145
    end
    object edtName: TcxDBTextEdit
      Left = 344
      Top = 20
      DataBinding.DataField = 'name'
      DataBinding.DataSource = MainDataSource
      TabOrder = 20
      Width = 145
    end
    object edtClearInCom: TcxDBTextEdit
      Left = 344
      Top = 59
      DataBinding.DataField = 'clearincome'
      DataBinding.DataSource = MainDataSource
      TabOrder = 21
      Width = 145
    end
    object edtClearPay: TcxDBTextEdit
      Left = 344
      Top = 99
      DataBinding.DataField = 'clearpay'
      DataBinding.DataSource = MainDataSource
      TabOrder = 22
      Width = 145
    end
    object edtClearMemo: TcxDBTextEdit
      Left = 96
      Top = 179
      DataBinding.DataField = 'clearmemo'
      DataBinding.DataSource = MainDataSource
      TabOrder = 23
      Width = 393
    end
  end
  object pnl2: TPanel [2]
    Left = 0
    Top = 0
    Width = 792
    Height = 47
    Align = alTop
    BevelOuter = bvNone
    Color = 16773345
    TabOrder = 4
    object clbr1: TCoolBar
      Left = 0
      Top = 0
      Width = 135
      Height = 47
      Align = alLeft
      Bands = <>
      Vertical = True
      object sbtnSDelete: TSpeedButton
        Left = 87
        Top = 1
        Width = 38
        Height = 40
        Hint = #21024#38500
        Caption = #21024#38500
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF000000
          00000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00000000000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF000000FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000FF000000FF000000FF0000000000FFFFFF00FFFFFF000000
          00000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF000000FF000000FF000000FF0000000000000000000000
          FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF000000FF000000FF000000FF000000
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00000000000000FF000000FF000000FF000000
          0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00000000000000FF000000FF000000FF000000FF000000
          FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000000000000000000000FF000000FF000000FF00FFFFFF00FFFFFF000000
          FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          00000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = sbtnSDeleteClick
      end
      object sbtnSNew: TSpeedButton
        Left = 5
        Top = 1
        Width = 38
        Height = 40
        Hint = #22686#21152
        Caption = #26032#22686
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF000000000000000000000000000000000000000000000000000000
          00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          0000FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF0000007F0000007F0000000000FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00000000000000000000007F0000007F0000007F0000000000FFFF
          FF000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000000000007F000000FF000000FF000000FF0000000000FFFF
          FF0000000000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000007F0000007F000000FF0000007F0000000000FFFFFF00FFFF
          FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000007F000000FF000000FF0000007F000000FF0000000000FFFFFF00FFFF
          FF000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          7F000000FF000000FF0000007F000000FF000000000000000000000000000000
          000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000007F000000
          FF0000007F0000007F0000007F0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000007F000000
          7F0000007F0000007F00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = btnContinueClick
      end
      object sbtnSSave: TSpeedButton
        Left = 46
        Top = 1
        Width = 38
        Height = 40
        Hint = #20445#23384
        Caption = #20445#23384'&'
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000004A4A4A0000000000C2C2C200C2C2C2009E9E9E009E9E9E009E9E
          9E00000000004A4A4A004A4A4A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00005656560056565600000000009E9E9E00C2C2C200C2C2C200C2C2C2009E9E
          9E0000000000565656004A4A4A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00006262620056565600000000000E0E0E000E0E0E000E0E0E000E0E0E000E0E
          0E0000000000565656005656560000000000FFFFFF00FFFFFF00FFFFFF000000
          000062626200626262004A4A4A004A4A4A004A4A4A004A4A4A004A4A4A004A4A
          4A004A4A4A00626262005656560000000000FFFFFF00FFFFFF00FFFFFF000000
          00006E6E6E006E6E6E0062626200626262006262620062626200626262006262
          620062626200626262006262620000000000FFFFFF00FFFFFF00FFFFFF000000
          00007A7A7A006E6E6E006E6E6E006E6E6E006E6E6E006E6E6E006E6E6E006E6E
          6E006E6E6E006E6E6E006262620000000000FFFFFF00FFFFFF00FFFFFF000000
          00007A7A7A003232320032323200323232003232320032323200323232003232
          320032323200323232006E6E6E0000000000FFFFFF00FFFFFF00FFFFFF000000
          00008686860000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E600323232007A7A7A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00009292920000000000E6E6E6004848FF006B6BFF008E8EFF00B1B1FF00B1B1
          FF00E6E6E600323232008686860000000000FFFFFF00FFFFFF00FFFFFF000000
          00009E9E9E0000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E600323232009292920000000000FFFFFF00FFFFFF00FFFFFF000000
          0000AAAAAA0000000000E6E6E6004848FF004848FF006B6BFF008E8EFF00B1B1
          FF00E6E6E600323232009E9E9E0000000000FFFFFF00FFFFFF00FFFFFF000000
          0000AAAAAA0000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E60032323200AAAAAA0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = btnOKClick
      end
    end
    object btnCreateVoucher: TcxButton
      Left = 144
      Top = 11
      Width = 75
      Height = 23
      Hint = #21024#38500#20973#35777
      Caption = #21024#38500#20973#35777
      Colors.Default = 16773345
      TabOrder = 2
      OnClick = btnCreateVoucherClick
    end
    object btnLoadVoucher: TcxButton
      Left = 224
      Top = 11
      Width = 75
      Height = 23
      Hint = #35843#38405#20973#35777
      Caption = #35843#38405#20973#35777
      Colors.Default = 16773345
      TabOrder = 1
      OnClick = btnLoadVoucherClick
    end
  end
  inherited btnPrint: TcxButton
    Top = 9
    ExplicitTop = 9
  end
  inherited edtPrint: TcxLookupComboBox
    Top = 11
    ExplicitTop = 11
    ExplicitHeight = 20
  end
  inherited MainDataSource: TDataSource
    DataSet = cdsMaster
    Left = 446
    Top = 175
  end
  inherited qryDynDtl: TUniQuery
    Left = 480
    Top = 16
  end
  object cdsMaster: TClientDataSet
    Tag = 1
    Aggregates = <>
    Params = <>
    ProviderName = 'dspMaster'
    Left = 392
    Top = 157
  end
  object dspMaster: TDataSetProvider
    DataSet = qryMainDataSet
    UpdateMode = upWhereKeyOnly
    Left = 344
    Top = 181
  end
  object qryMainDataSet: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixedassets'
      
        '  (fixedassetid, filid, fadeltypeid, newtypeid, statusid, fatype' +
        'id, deprmethodid, addvoucherid, delvoucherid, cardcode, assetcod' +
        'e, name, specific, location, useddate, planusemonth, sumusedmont' +
        'h, startsumusedmonth, planworkvalue, sumworkedvalue, startsumwor' +
        'kedvalue, workunit, rawamt, sumdepramt, startsumdepramt, remaina' +
        'mt, remainrate, monthdepramt, monthdeprrate, deproption, clearda' +
        'te, clearincome, clearpay, clearmemo, cleared, addr, vendorname,' +
        ' producename, initflag, startrawamt, astsubid, dprsubid, clearsu' +
        'bid, price, quantity, foreignamt, foreigncurid, unit, custom1, c' +
        'ustom2, custom3, custom4, custom5, pic, pictype, incomesubid, in' +
        'comeaccountid, paysubid, payaccountid, taxsubid, taxamount)'
      'VALUES'
      
        '  (:fixedassetid, :filid, :fadeltypeid, :newtypeid, :statusid, :' +
        'fatypeid, :deprmethodid, :addvoucherid, :delvoucherid, :cardcode' +
        ', :assetcode, :name, :specific, :location, :useddate, :planusemo' +
        'nth, :sumusedmonth, :startsumusedmonth, :planworkvalue, :sumwork' +
        'edvalue, :startsumworkedvalue, :workunit, :rawamt, :sumdepramt, ' +
        ':startsumdepramt, :remainamt, :remainrate, :monthdepramt, :month' +
        'deprrate, :deproption, :cleardate, :clearincome, :clearpay, :cle' +
        'armemo, :cleared, :addr, :vendorname, :producename, :initflag, :' +
        'startrawamt, :astsubid, :dprsubid, :clearsubid, :price, :quantit' +
        'y, :foreignamt, :foreigncurid, :unit, :custom1, :custom2, :custo' +
        'm3, :custom4, :custom5, :pic, :pictype, :incomesubid, :incomeacc' +
        'ountid, :paysubid, :payaccountid, :taxsubid, :taxamount)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixedassets'
      'SET'
      
        '  fixedassetid = :fixedassetid, filid = :filid, fadeltypeid = :f' +
        'adeltypeid, newtypeid = :newtypeid, statusid = :statusid, fatype' +
        'id = :fatypeid, deprmethodid = :deprmethodid, addvoucherid = :ad' +
        'dvoucherid, delvoucherid = :delvoucherid, cardcode = :cardcode, ' +
        'assetcode = :assetcode, name = :name, specific = :specific, loca' +
        'tion = :location, useddate = :useddate, planusemonth = :planusem' +
        'onth, sumusedmonth = :sumusedmonth, startsumusedmonth = :startsu' +
        'musedmonth, planworkvalue = :planworkvalue, sumworkedvalue = :su' +
        'mworkedvalue, startsumworkedvalue = :startsumworkedvalue, workun' +
        'it = :workunit, rawamt = :rawamt, sumdepramt = :sumdepramt, star' +
        'tsumdepramt = :startsumdepramt, remainamt = :remainamt, remainra' +
        'te = :remainrate, monthdepramt = :monthdepramt, monthdeprrate = ' +
        ':monthdeprrate, deproption = :deproption, cleardate = :cleardate' +
        ', clearincome = :clearincome, clearpay = :clearpay, clearmemo = ' +
        ':clearmemo, cleared = :cleared, addr = :addr, vendorname = :vend' +
        'orname, producename = :producename, initflag = :initflag, startr' +
        'awamt = :startrawamt, astsubid = :astsubid, dprsubid = :dprsubid' +
        ', clearsubid = :clearsubid, price = :price, quantity = :quantity' +
        ', foreignamt = :foreignamt, foreigncurid = :foreigncurid, unit =' +
        ' :unit, custom1 = :custom1, custom2 = :custom2, custom3 = :custo' +
        'm3, custom4 = :custom4, custom5 = :custom5, pic = :pic, pictype ' +
        '= :pictype, incomesubid = :incomesubid, incomeaccountid = :incom' +
        'eaccountid, paysubid = :paysubid, payaccountid = :payaccountid, ' +
        'taxsubid = :taxsubid, taxamount = :taxamount'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixedassets'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, filid, fadeltypeid, newtypeid, statusid, fa' +
        'typeid, deprmethodid, addvoucherid, delvoucherid, cardcode, asse' +
        'tcode, name, specific, location, useddate, planusemonth, sumused' +
        'month, startsumusedmonth, planworkvalue, sumworkedvalue, startsu' +
        'mworkedvalue, workunit, rawamt, sumdepramt, startsumdepramt, rem' +
        'ainamt, remainrate, monthdepramt, monthdeprrate, deproption, cle' +
        'ardate, clearincome, clearpay, clearmemo, cleared, addr, vendorn' +
        'ame, producename, initflag, startrawamt, astsubid, dprsubid, cle' +
        'arsubid, price, quantity, foreignamt, foreigncurid, unit, custom' +
        '1, custom2, custom3, custom4, custom5, pic, pictype, incomesubid' +
        ', incomeaccountid, paysubid, payaccountid, taxsubid, taxamount F' +
        'ROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQL.Strings = (
      'Select * From tfb_fixedassets '
      '  Where Cleared=1')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 272
    Top = 169
  end
  object qryTemp: TUniQuery
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 240
    Top = 24
  end
  object dsTemp: TDataSource
    DataSet = qryTemp
    Left = 245
    Top = 67
  end
  object qryAsset: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixedassets'
      
        '  (fixedassetid, filid, fadeltypeid, newtypeid, statusid, fatype' +
        'id, deprmethodid, addvoucherid, delvoucherid, cardcode, assetcod' +
        'e, name, specific, location, useddate, planusemonth, sumusedmont' +
        'h, startsumusedmonth, planworkvalue, sumworkedvalue, startsumwor' +
        'kedvalue, workunit, rawamt, sumdepramt, startsumdepramt, remaina' +
        'mt, remainrate, monthdepramt, monthdeprrate, deproption, clearda' +
        'te, clearincome, clearpay, clearmemo, cleared, addr, vendorname,' +
        ' producename, initflag, startrawamt, astsubid, dprsubid, clearsu' +
        'bid, price, quantity, foreignamt, foreigncurid, unit, custom1, c' +
        'ustom2, custom3, custom4, custom5, pic, pictype, incomesubid, in' +
        'comeaccountid, paysubid, payaccountid, taxsubid, taxamount)'
      'VALUES'
      
        '  (:fixedassetid, :filid, :fadeltypeid, :newtypeid, :statusid, :' +
        'fatypeid, :deprmethodid, :addvoucherid, :delvoucherid, :cardcode' +
        ', :assetcode, :name, :specific, :location, :useddate, :planusemo' +
        'nth, :sumusedmonth, :startsumusedmonth, :planworkvalue, :sumwork' +
        'edvalue, :startsumworkedvalue, :workunit, :rawamt, :sumdepramt, ' +
        ':startsumdepramt, :remainamt, :remainrate, :monthdepramt, :month' +
        'deprrate, :deproption, :cleardate, :clearincome, :clearpay, :cle' +
        'armemo, :cleared, :addr, :vendorname, :producename, :initflag, :' +
        'startrawamt, :astsubid, :dprsubid, :clearsubid, :price, :quantit' +
        'y, :foreignamt, :foreigncurid, :unit, :custom1, :custom2, :custo' +
        'm3, :custom4, :custom5, :pic, :pictype, :incomesubid, :incomeacc' +
        'ountid, :paysubid, :payaccountid, :taxsubid, :taxamount)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixedassets'
      'SET'
      
        '  fixedassetid = :fixedassetid, filid = :filid, fadeltypeid = :f' +
        'adeltypeid, newtypeid = :newtypeid, statusid = :statusid, fatype' +
        'id = :fatypeid, deprmethodid = :deprmethodid, addvoucherid = :ad' +
        'dvoucherid, delvoucherid = :delvoucherid, cardcode = :cardcode, ' +
        'assetcode = :assetcode, name = :name, specific = :specific, loca' +
        'tion = :location, useddate = :useddate, planusemonth = :planusem' +
        'onth, sumusedmonth = :sumusedmonth, startsumusedmonth = :startsu' +
        'musedmonth, planworkvalue = :planworkvalue, sumworkedvalue = :su' +
        'mworkedvalue, startsumworkedvalue = :startsumworkedvalue, workun' +
        'it = :workunit, rawamt = :rawamt, sumdepramt = :sumdepramt, star' +
        'tsumdepramt = :startsumdepramt, remainamt = :remainamt, remainra' +
        'te = :remainrate, monthdepramt = :monthdepramt, monthdeprrate = ' +
        ':monthdeprrate, deproption = :deproption, cleardate = :cleardate' +
        ', clearincome = :clearincome, clearpay = :clearpay, clearmemo = ' +
        ':clearmemo, cleared = :cleared, addr = :addr, vendorname = :vend' +
        'orname, producename = :producename, initflag = :initflag, startr' +
        'awamt = :startrawamt, astsubid = :astsubid, dprsubid = :dprsubid' +
        ', clearsubid = :clearsubid, price = :price, quantity = :quantity' +
        ', foreignamt = :foreignamt, foreigncurid = :foreigncurid, unit =' +
        ' :unit, custom1 = :custom1, custom2 = :custom2, custom3 = :custo' +
        'm3, custom4 = :custom4, custom5 = :custom5, pic = :pic, pictype ' +
        '= :pictype, incomesubid = :incomesubid, incomeaccountid = :incom' +
        'eaccountid, paysubid = :paysubid, payaccountid = :payaccountid, ' +
        'taxsubid = :taxsubid, taxamount = :taxamount'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixedassets'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, filid, fadeltypeid, newtypeid, statusid, fa' +
        'typeid, deprmethodid, addvoucherid, delvoucherid, cardcode, asse' +
        'tcode, name, specific, location, useddate, planusemonth, sumused' +
        'month, startsumusedmonth, planworkvalue, sumworkedvalue, startsu' +
        'mworkedvalue, workunit, rawamt, sumdepramt, startsumdepramt, rem' +
        'ainamt, remainrate, monthdepramt, monthdeprrate, deproption, cle' +
        'ardate, clearincome, clearpay, clearmemo, cleared, addr, vendorn' +
        'ame, producename, initflag, startrawamt, astsubid, dprsubid, cle' +
        'arsubid, price, quantity, foreignamt, foreigncurid, unit, custom' +
        '1, custom2, custom3, custom4, custom5, pic, pictype, incomesubid' +
        ', incomeaccountid, paysubid, payaccountid, taxsubid, taxamount F' +
        'ROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQL.Strings = (
      'Select * From tfb_fixedassets')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Filter = 'cleared=0'
    Left = 8
    Top = 33
  end
  object dsAsset: TDataSource
    DataSet = qryAsset
    Left = 53
    Top = 35
  end
end
